home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 July / 07_02.iso / software / xq-xsetup / files / setup.exe / {app} / plugins / Xifa Gku 2.xpl < prev    next >
Text File  |  2000-08-07  |  2KB  |  86 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 5.0"
  2. "TYPE"="1"
  3. "COUNT"="4"
  4. "UIPATH"="Internet\Instant Messaging\Gku"
  5. "NAME"="Server Settings"
  6. "LANGUAGE"="VBScript"
  7. "TEXT 1"="LogicServer"
  8. "TEXT 2"="Server Port"
  9. "TEXT 3"="Timeout"
  10. "TEXT 4"="Retry Delay"
  11. "DESCRIPTION 1"="These are the settings which Gku uses as the LogicS 'community' server."
  12. "DESCRIPTION 2"="Typical IP addresses for the servers are: "
  13. "DESCRIPTION 3"="The Pest's Server (Default): 24.218.179.145"
  14. "DESCRIPTION 4"="Biztalk's Server: 24.48.148.50"
  15. "DESCRIPTION 5"="Please note that the servers listed here are only compatible with Gku 2 Build 11 onwards."
  16. "DESCRIPTION 6"="The server port is always 1998, and is provided here for debuging only."
  17. "DESCRIPTION 7"="The Timeout and Retry Delay are provided to debug message sending."
  18. "DESCRIPTION 8"="Gku may be obtained at http://lockergnome.virtualave.net"
  19. "COMMENT 1"="For more information, go to http://www.xteq.com."
  20. "COMMENT 2"="Thanks to CptSiskoX for the settings and the idea."
  21. "COMMENT 3"="Thanks also to Vex, the maker of Gku."
  22. "VERSION"="3.00"
  23. "AUTHOR"="Vex Bit <vex@xifa.fsnet.co.uk>"
  24. "COPYRIGHT"="Copyright ⌐ 1999-2000, Xifa Technologies, Inc."
  25.  
  26. 'Declaration of some constants
  27. sFile=""
  28. sSec="Connection"
  29. sV1="LogicServer"
  30. sV2="ServerPort"
  31. sV3="Timeout"
  32. sV4="RetryDelay"
  33.  
  34. 'Called when the Plugin is started
  35. SUB Plugin_Initialize
  36.  Call GetGkuFile
  37.  
  38.  If FileExists(sFile) then
  39.  
  40.     s=iniReadValue(sFile,sSec,sV1)
  41.     SetUiElement 1,s
  42.  
  43.     s=iniReadValue(sFile,sSec,sV2)
  44.     SetUiElement 2,s
  45.  
  46.     s=iniReadValue(sFile,sSec,sV3)
  47.     SetUiElement 3,s
  48.  
  49.     s=iniReadValue(sFile,sSec,sV4)
  50.     SetUiElement 4,s
  51.  
  52.  else
  53.     Call Disable()
  54.  End if
  55.  
  56. END SUB
  57.  
  58. 'Called when the Plugin should validate the Data the user has entered
  59. SUB Plugin_CheckData(ElementIndex)
  60. END SUB
  61.  
  62. 'Called when the Plugin should apply the changes
  63. SUB Plugin_Apply(ElementIndex,ElementSubIndex)
  64.     s=GetUIElement(1)
  65.     Call iniWriteValue(sFile,sSec,sV1,s)
  66.  
  67.     s=GetUIElement(2)
  68.     Call iniWriteValue(sFile,sSec,sV2,s)
  69.  
  70.     s=GetUIElement(3)
  71.     Call iniWriteValue(sFile,sSec,sV3,s)
  72.  
  73.     s=GetUIElement(4)
  74.     Call iniWriteValue(sFile,sSec,sV4,s)
  75. END SUB
  76.  
  77. 'Called when the Plugin is about to be removed from memory
  78. SUB Plugin_Terminate
  79. END SUB
  80.  
  81. 'User defined SUB's
  82. SUB GetGKUFile
  83.    s=iniReadValue("WIN.INI","GKU","InstallDir")
  84.    sFile=s & "\gku.ini"
  85. END SUB
  86.